From: Eli Zaretskii Date: Sat, 27 Jan 2007 17:38:14 +0000 (+0000) Subject: Fix whitespace and indentation. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~2646 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=def4897f0527b2c2eb885f025e8ab2354c16ff46;p=emacs.git Fix whitespace and indentation. --- diff --git a/lisp/mouse.el b/lisp/mouse.el index 7d3c39a986c..c221a9bee99 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -1041,19 +1041,19 @@ should only be used by mouse-drag-region." (if do-multi-click (goto-char start-point)) (delete-overlay mouse-drag-overlay) (when (and (functionp fun) - (= start-hscroll (window-hscroll start-window)) - ;; Don't run the up-event handler if the - ;; window start changed in a redisplay after - ;; the mouse-set-point for the down-mouse - ;; event at the beginning of this function. - ;; When the window start has changed, the - ;; up-mouse event will contain a different - ;; position due to the new window contents, - ;; and point is set again. - (or end-point - (= (window-start start-window) - start-window-start))) - (when (and on-link + (= start-hscroll (window-hscroll start-window)) + ;; Don't run the up-event handler if the + ;; window start changed in a redisplay after + ;; the mouse-set-point for the down-mouse + ;; event at the beginning of this function. + ;; When the window start has changed, the + ;; up-mouse event will contain a different + ;; position due to the new window contents, + ;; and point is set again. + (or end-point + (= (window-start start-window) + start-window-start))) + (when (and on-link (or (not end-point) (= end-point start-point)) (consp event) (or remap-double-click